home *** CD-ROM | disk | FTP | other *** search
Text File | 1987-09-14 | 2.0 KB | 83 lines | [TEXT/MPS ] |
- ### MixMake version 2.
- #### Uses Sequencer application and Consulair Exec
-
- ### Script file to build programs with
- ### MacC or TML systems
- ### W.G. Powell 1987 for MacTutor
-
- ### Initialize variables
- # Exec and MacC input and scratch files
- Set Efile "MixMake.Job"
- Set Cfile "MacC.Files"
- Set Lfile "CLink.Tmp"
- Set Tfile "TLink.Tmp"
- Set Seqfile "Sequencer.R"
- Delete -i "{Efile}" "{Cfile}" "{Lfile}" "{Tfile}"
- Echo "#include ∂"Types.r∂"">"{Seqfile}"
- Echo "include ∂"{MPW}Applications:Sequencer∂" ∂'CODE∂' ;">>"{Seqfile}"
- Echo "resource 'STR#' (128,∂"MixMake Compile commands∂") ∂{">>"{Seqfile}"
- Echo -n "∂{ ">>"{Seqfile}"
- # Application run flags
- Set RunMacC 0
- Set RunLink 0 # Consulair
- Set RunTMLLink 0
- # Make's working directory
- Set MakeWD "`Directory`"
- Export MakeWD
-
- ### Run the Make tool
- make {"Parameters"} > MakeOutApps ≥Dev:StdOut
-
- ### Construct the input for the Exec application
- Execute MakeOutApps
- Delete MakeOutApps
- If ({RunMacC} == 1)
- Echo "C {Cfile} Exec Done">>"{Efile}"
- End
- If ({RunLink} == 1)
- Catenate "{Lfile}" >>"{Efile}"
- Delete -i "{Lfile}"
- End
- If ({RunTMLLink} == 1)
- Catenate "{Tfile}" >>"{Seqfile}"
- Delete -i "{Tfile}"
- End
- If ({RunMacC} == 1 || {RunLink} == 1)
- Echo "∂"{MakeWD}{Efile}∂";">>"{Seqfile}"
- Echo "∂"{MPW}Applications:Exec∂";">>"{Seqfile}"
- End
- Open -t "{Seqfile}"
- Find ∞ "{Seqfile}"
- Clear \;\ "{Seqfile}"
- Echo "∂n∂}∂n∂};">>"{Seqfile}"
- Close -y "{Seqfile}"
- Rez -o "{MPW}Applications:PasRunner" "{Seqfile}"
- If {Status} == 0
- Delete -i "{Seqfile}"
- End
- Unset RunMacC
- Unset RunLink
- Unset RunTMLLink
- Unset Lfile
- Unset Cfile
- Unset Tfile
- Unset MakeWD
- Unset Seqfile
-
- ### Set up the Resume tasks for after the applications
- ### Primarily for error handling
- Set PostApp "{MPW}UserResume"
- Echo "Unset Efile" >"{MPW}UserResume"
- Catenate "{MPW}MakeSupport:MixMakeResume" >>"{MPW}UserResume"
-
- ### If Diagnostic menu item is still around from
- ### an earlier build cycle, delete it.
- Set __oldExit {Exit}
- Set Exit 0
- DeleteMenu File "Open Diagnostics…" ≥Dev:Null
- Set Exit {__oldExit}
- Unset __oldExit
-
- ### Run applications using the custom Sequencer
- "{MPW}Applications:PasRunner"
-